(ispell-word): Call ispell-dehighlight.

diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el
index 5776d2d3a2812d659cad0f039ca39a4cf3f8f31e..2ee40028ceb8a7159908b88ff85fd4b2075521ef 100644 (file)
--- a/lisp/textmodes/ispell4.el
+++ b/lisp/textmodes/ispell4.el
@@ -370,10 +370,12 @@ With a prefix argument, resume handling of the previous Ispell command."
   (if resume
       (ispell-next)
     (condition-case err
-       (catch 'ispell-quit
-         (save-window-excursion
-           (ispell-point (point) "at point."))
-         (ispell-dump))
+       (unwind-protect
+           (catch 'ispell-quit
+             (save-window-excursion
+               (ispell-point (point) "at point."))
+             (ispell-dump))
+         (ispell-dehighlight))
       (ispell-startup-error
        (cond ((y-or-n-p "Problem starting ispell, use old-style spell instead? ")
              (load-library "spell")